home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 153
/
153.d81
/
u.rescue.rana #2
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
1KB
|
31 lines
10 poke53280,0:poke53281,0:printchr$(14)
20 print"[147][158] [210] [197] [211] [195] [213] [197] [193] [212] [210] [193] [206] [193] ([193]gain)"
30 print"[212]his will add a ([217]/[206]) [207]ption asking"
40 print"if you want the [211]prites [196]isabled."
50 print"[201]f [217]es, your ship will pass right"
60 print"through all of the barriers."
80 print"[201]t's best to use a copy rather than"
90 print"using your original [204][207][193][196][211][212][193][210] disk!"
100 print"[205]ake sure that the [215]rite-[208]rotect tab"
110 print"on the disk is not covered as this"
120 print"program writes to the disk."
130 print"[201]f you would like to make this change,"
140 print"[201]nsert [204]oadstar [201]ssue #101 [211]ide 4 into"
150 print"[196]rive #8 and [200]it [193] [203]ey."
152 print"[193]fter hitting a key, [196]o [206][207][212] touch the"
154 print"keyboard or open the disk drive door"
156 print"until the white [195]ursor appears!!!!!!"
160 geta$:ifa$=""then160
180 q$=chr$(34):f$="rana boot"
190 print"[147][144]l[207]"q$f$q$",8"
200 print"173 ?"q$"[158][196]isable [211]prites? ([217]/[206])"q$
205 print"174 getz$:ifz$="q$q$"then174"
210 print"175 ifz$="q$"n"q$"then180"
215 print"176 f[207]x=1to4:r[197]a:p[207]a,169:p[207]a+1,0:p[207]a+2,250:n[197]"
220 print"177 d[193]19294,21075,21165,21242"
250 print"o[208]15,8,15,"q$"s0:"f$q$":cl[207]15:s[193]"q$f$q$",8"
260 print"p[207]646,1
270 [153]""
280 [129]i[178]631[164]640:[151]i,13:[130]:[151]198,10
290 [162]